CREATEPAL
Cette fonction vous permet de créer une palette de couleurs.
Syntaxe
NPPalPager.CreatePal PpRed(), pGreen(), pBlue(), Entries
La syntaxe de la méthode CreatePal comprend les éléments suivantsá:
Elément |
Description |
pRed() |
Valeur de type byte représentant les composantes ROUGES. |
pGreen() |
Valeur de type byte représentant les composantes VERTES. |
pBlue() |
Valeur de type byte représentant les composantes BLEUES. |
Entries |
Valeur de type integer représentant le nombre de couleurs à générer. |
Exemple
Dim Rouge(16) As Byte, Vert(16) As Byte, Bleu(16) As Byte
Dim R as Integer
For R = 0 To 15
Rouge(R) = 255 - (R * 15)
Vert(R) = 255 - (R * 15)
Bleu(R) = 255 - (R * 15)
Next R
Call NPPalPager1.CreatePal(Rouge, Vert, Bleu, 16)
NPPalPager1.Refresh
-->Créé une palette de 16 couleurs en dégradé de blanc vers noir.